home *** CD-ROM | disk | FTP | other *** search
/ Windows News 2005 November / WNnov2005.iso / Windows / Equipement / hMailServer / hMailServer-4.1-Build-136.exe / {app} / PHPWebAdmin / distributionlists_edit.php < prev    next >
PHP Script  |  2005-04-05  |  3KB  |  76 lines
  1. <?php
  2. /*
  3. ** $Id: distributionlists_edit.php,v 1.4 2005/04/05 20:19:10 hmailserver Exp $
  4. **
  5. **    hMailServer - Web interface
  6. **
  7. **    File formatted using TAB size 4
  8. **
  9. **    Get hMailserver at http://www.hmailserver.com
  10. **
  11. **    Author: Steen Rab°l <srabol@mail.tele.dk>
  12. **    Copyright (c) 2004, Steen Rab°l <srabol@mail.tele.dk>
  13. **
  14. **  This program is free software; you can redistribute it and/or modify
  15. **  it under the terms of the GNU General Public License as published by
  16. **  the Free Software Foundation; either version 2 of the License, or
  17. **  (at your option) any later version.
  18. **
  19. **  You may not change or alter any portion of this comment or credits
  20. **  of supporting developers from this source code or any supporting
  21. **  source code which is considered copyrighted (c) material of the
  22. **  original comment or credit authors.
  23. **
  24. **  This program is distributed in the hope that it will be useful,
  25. **  but WITHOUT ANY WARRANTY; without even the implied warranty of
  26. **  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  27. **  GNU General Public License for more details.
  28. **
  29. **  You should have received a copy of the GNU General Public License
  30. **  along with this program; if not, write to the Free Software
  31. **  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  32. **
  33. */
  34.  
  35. $DomainID            = hmailGetVar("DomainID",null);
  36. $DistributionlistID    = hmailGetVar("DistributionlistID",0);
  37. $function            = hmailGetVar("function","");
  38.  
  39. if (hmailGetAdminLevel() == 0)
  40.     hmailHackingAttemp(); // Users are not allowed to show this page.
  41.  
  42. if (hmailGetAdminLevel() == 1 && $DomainID != hmailGetDomainID())
  43.     hmailHackingAttemp(); // Domain admin but not for this domain.
  44.  
  45. $obDomain            = $obBaseApp->Domains->ItemByDBID($DomainID);
  46. $obDistributionlists    = $obDomain->DistributionLists();
  47. $obDistributionlist        = $obDistributionlists->ItemByDBID($DistributionlistID);
  48.  
  49. switch($function)
  50. {
  51.     case "doedit":
  52.         $obDistributionlist->Address = hmailGetVar("Address") . "@" . $obDomain->Name;
  53.         $obDistributionlist->Active    = (hmailGetVar("Active") == "1") ? 1 : 0;
  54.  
  55.         if(hmailGetVar("RequireSMTPAuth","") != "")
  56.             $obDistributionlist->RequireSMTPAuth = true;
  57.         else
  58.             $obDistributionlist->RequireSMTPAuth = false;
  59.  
  60.         $obDistributionlist->RequireSenderAddress = hmailGetVar("RequireSenderAddress","");
  61.  
  62.         $obDistributionlist->Save();
  63.         header("refresh: 0; url=index.php?page=distributionlists&DomainID=$DomainID");
  64.         exit();
  65.         break;
  66.  
  67.     default:
  68.         $address = substr($obDistributionlist->Address, 0, strpos($obDistributionlist->Address, "@"));
  69.     
  70.         $hmailSmarty->assign("address",$address);
  71.         $hmailSmarty->assign("distributionlist",$obDistributionlist);
  72.         $hmailSmarty->assign("domain",$obDomain);
  73.         $hmailSmarty->assign("pagecontent", $hmailSmarty->fetch('distributionlists_edit.tpl'));
  74.         break;
  75. }
  76. ?>